PC World Interactive 4/PC World Interactive 4.iso/share/ofis/32psam/REMIND.EXE/0/RCDATA/TREPDLG/TREPDLG.txt

Text File | 1997-09-03 | 17KB | 624 lines

object RepDlg: TRepDlg
  Left = 192
  Top = 241
  BorderStyle = bsDialog
  Caption = 'Print'
  ClientHeight = 345
  ClientWidth = 368
  Font.Color = clBlack
  Font.Height = -11
  Font.Name = 'Arial'
  Font.Style = []
  Scaled = False
  ShowHint = True
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 14
  object ButtonPanel: TPanel
    Left = 283
    Top = 0
    Width = 85
    Height = 291
    Align = alRight
    BevelOuter = bvNone
    Font.Color = clBlack
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object PrintBtn: TBitBtn
      Left = 5
      Top = 66
      Width = 77
      Height = 27
      Hint = 'Print Report On Selected Printer'
      Caption = '&Print'
      Default = True
      TabOrder = 2
      OnClick = PrintBtnClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF77333333333000000333333333377777733333330000}
      Margin = 2
      NumGlyphs = 2
      Spacing = -1
      IsControl = True
    end
    object CancelBtn: TBitBtn
      Left = 5
      Top = 6
      Width = 77
      Height = 27
      Hint = 'Close This Window'
      Caption = '&Close'
      TabOrder = 0
      Kind = bkCancel
      Margin = 2
      Spacing = -1
      IsControl = True
    end
    object HelpBtn: TBitBtn
      Left = 5
      Top = 36
      Width = 77
      Height = 27
      Hint = 'Display Help Window'
      TabOrder = 1
      OnClick = HelpBtnClick
      Kind = bkHelp
      Margin = 2
      Spacing = -1
      IsControl = True
    end
    object PreviewBtn: TBitBtn
      Left = 5
      Top = 126
      Width = 77
      Height = 27
      Hint = 'Preview Report On Screen'
      Caption = 'Pre&view'
      Default = True
      TabOrder = 4
      OnClick = PreviewBtnClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        033333777777777773333330777777703333333773F333773333333330888033
        33333FFFF7FFF7FFFFFF0000000000000003777777777777777F0FFFFFFFFFF9
        FF037F3333333337337F0F78888888887F037F33FFFFFFFFF37F0F7000000000
        8F037F3777777777F37F0F70AAAAAAA08F037F37F3333337F37F0F70ADDDDDA0
        8F037F37F3333337F37F0F70A99A99A08F037F37F3333337F37F0F70A99A99A0
        8F037F37F3333337F37F0F70AAAAAAA08F037F37FFFFFFF7F37F0F7000000000
        8F037F3777777777337F0F77777777777F037F3333333333337F0FFFFFFFFFFF
        FF037FFFFFFFFFFFFF7F000000000000000377777777777777730000}
      Margin = 2
      NumGlyphs = 2
      Spacing = -1
      IsControl = True
    end
    object SelectBtn: TBitBtn
      Left = 5
      Top = 96
      Width = 77
      Height = 27
      Hint = 'Select Printer'
      Caption = 'S&elect'
      Default = True
      TabOrder = 3
      OnClick = SelectBtnClick
      Glyph.Data = {
        78010000424D7801000000000000760000002800000020000000100000000100
        04000000000000000000120B0000120B00000000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF77333333333000000333333333377777733333330000}
      Margin = 2
      NumGlyphs = 2
      Spacing = -1
      IsControl = True
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 291
    Width = 368
    Height = 33
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object PreviousBtn: TButton
      Left = 16
      Top = 3
      Width = 89
      Height = 25
      Caption = '<< P&revious'
      TabOrder = 0
      Visible = False
      OnClick = PreviousBtnClick
    end
    object NextBtn: TButton
      Left = 162
      Top = 3
      Width = 89
      Height = 25
      Caption = '&Next >>'
      TabOrder = 1
      OnClick = NextBtnClick
    end
  end
  object Notebook: TNotebook
    Left = 0
    Top = 0
    Width = 283
    Height = 291
    Align = alClient
    TabOrder = 2
    IsControl = True
    object TPage
      Left = 0
      Top = 0
      Caption = 'Page'
      object GroupBox20: TGroupBox
        Left = 0
        Top = 0
        Width = 283
        Height = 291
        Align = alClient
        Caption = 'Page Settings'
        TabOrder = 0
        object Image4: TImage
          Left = 216
          Top = 69
          Width = 33
          Height = 33
          Picture.Data = {<image000.bmp>}
          Visible = False
        end
        object Image3: TImage
          Left = 216
          Top = 69
          Width = 33
          Height = 33
          Picture.Data = {<image001.bmp>}
        end
        object Image2: TImage
          Left = 216
          Top = 153
          Width = 49
          Height = 41
          Picture.Data = {<image002.bmp>}
          Visible = False
        end
        object Image1: TImage
          Left = 216
          Top = 153
          Width = 49
          Height = 41
          Picture.Data = {<image003.bmp>}
        end
        object Label3: TLabel
          Left = 8
          Top = 256
          Width = 99
          Height = 14
          Caption = 'Number Of Columns:'
        end
        object OrientationRG: TRadioGroup
          Left = 7
          Top = 148
          Width = 202
          Height = 44
          Hint = 'Select Page Orientation'
          Caption = 'Page Orientation'
          Items.Strings = (
            'Portrait'
            'Landscape')
          TabOrder = 1
          OnClick = OrientationRGClick
        end
        object RadioGroup1: TRadioGroup
          Left = 8
          Top = 194
          Width = 201
          Height = 44
          Hint = 'Units Of Measure (used by widths, heights, margins, etc.)'
          Caption = 'Units Of Measure'
          Items.Strings = (
            'inches'
            'centimeters')
          TabOrder = 2
          OnClick = RadioGroup1Click
        end
        object GroupBox21: TGroupBox
          Left = 8
          Top = 14
          Width = 201
          Height = 131
          Caption = 'Page Size in Units'
          TabOrder = 0
          object Label31: TLabel
            Left = 5
            Top = 19
            Width = 30
            Height = 14
            Caption = 'Width:'
          end
          object Label32: TLabel
            Left = 101
            Top = 19
            Width = 33
            Height = 14
            Caption = 'Height:'
          end
          object SizeRG: TRadioGroup
            Left = 8
            Top = 39
            Width = 185
            Height = 84
            Hint = 'Some Page Sizes may not be accepted by your Printer'
            Items.Strings = (
              'Letter'
              'Legal'
              'A4'
              'Custom')
            TabOrder = 2
            OnClick = SizeRGClick
          end
          object PgWidthEd: TEdit
            Left = 43
            Top = 16
            Width = 49
            Height = 22
            TabOrder = 0
          end
          object PgHeightEd: TEdit
            Left = 143
            Top = 16
            Width = 49
            Height = 22
            TabOrder = 1
          end
        end
        object SpinEdit1: TSpinEdit
          Left = 126
          Top = 255
          Width = 41
          Height = 23
          Hint = 'Number Of Columns per page'
          Color = clBtnFace
          EditorEnabled = False
          MaxValue = 9
          MinValue = 1
          TabOrder = 3
          Value = 1
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Scope'
      object GroupBox1: TGroupBox
        Left = 0
        Top = 0
        Width = 283
        Height = 291
        Align = alClient
        Caption = 'Print Scope'
        TabOrder = 0
        object Label1: TLabel
          Left = 16
          Top = 112
          Width = 76
          Height = 14
          Caption = 'Print From Date:'
        end
        object Label2: TLabel
          Left = 28
          Top = 139
          Width = 64
          Height = 14
          Caption = 'Print To Date:'
        end
        object DateEdit1: TDateEdit
          Left = 111
          Top = 109
          Width = 120
          Height = 22
          DateFormat = 'mm/dd/yyyy'
          Date = '__/__/____'
          MaxLength = 10
          TabOrder = 1
        end
        object DateEdit2: TDateEdit
          Left = 112
          Top = 136
          Width = 120
          Height = 22
          DateFormat = 'mm/dd/yyyy'
          Date = '__/__/____'
          MaxLength = 10
          TabOrder = 2
        end
        object ScopeRG: TRadioGroup
          Left = 16
          Top = 16
          Width = 241
          Height = 89
          Caption = 'Print Scope'
          Items.Strings = (
            'Today'
            'Current Week'
            'Current Month'
            'Current Year'
            'Custom')
          TabOrder = 0
          OnClick = ScopeRGClick
        end
        object GroupBox2: TGroupBox
          Left = 16
          Top = 163
          Width = 180
          Height = 120
          Caption = 'Print Reminders'
          TabOrder = 3
          object RadioGroup2: TRadioGroup
            Left = 7
            Top = 17
            Width = 74
            Height = 97
            Caption = 'Status'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ItemIndex = 3
            Items.Strings = (
              'Active'
              'Waiting'
              'Expired'
              'All')
            ParentFont = False
            TabOrder = 0
          end
          object RadioGroup3: TRadioGroup
            Left = 88
            Top = 17
            Width = 84
            Height = 97
            Caption = 'Priority'
            Font.Color = clBlack
            Font.Height = -11
            Font.Name = 'Arial'
            Font.Style = []
            ItemIndex = 5
            Items.Strings = (
              'Low'
              'Normal'
              'Low+Norm.'
              'High'
              'Hi+Norm.'
              'All')
            ParentFont = False
            TabOrder = 1
          end
        end
      end
    end
    object TPage
      Left = 0
      Top = 0
      Caption = 'Body'
      object GroupBox9: TGroupBox
        Left = 0
        Top = 0
        Width = 283
        Height = 291
        Align = alClient
        Caption = 'Report Body'
        TabOrder = 0
        object GroupBox11: TGroupBox
          Left = 8
          Top = 20
          Width = 225
          Height = 44
          Caption = 'Body Margins [Units]'
          TabOrder = 0
          object Label18: TLabel
            Left = 14
            Top = 20
            Width = 22
            Height = 14
            Caption = 'Left:'
          end
          object Label19: TLabel
            Left = 109
            Top = 20
            Width = 21
            Height = 14
            Caption = 'Top:'
          end
          object LMargin: TEdit
            Left = 41
            Top = 17
            Width = 49
            Height = 22
            Hint = 'Report Body Left Margin'
            TabOrder = 0
          end
          object TMargin: TEdit
            Left = 136
            Top = 17
            Width = 49
            Height = 22
            Hint = 'Report Text Top Margin'
            TabOrder = 1
          end
        end
        object GroupBox10: TGroupBox
          Left = 8
          Top = 72
          Width = 225
          Height = 193
          Caption = 'Text Font'
          TabOrder = 1
          object Label10: TLabel
            Left = 16
            Top = 16
            Width = 54
            Height = 14
            Caption = 'Font Name:'
          end
          object Label11: TLabel
            Left = 16
            Top = 60
            Width = 51
            Height = 14
            Caption = 'Font Style:'
          end
          object Label12: TLabel
            Left = 16
            Top = 104
            Width = 48
            Height = 14
            Caption = 'Font Size:'
          end
          object FontEd: TEdit
            Left = 16
            Top = 32
            Width = 185
            Height = 22
            TabStop = False
            Color = clBtnFace
            ReadOnly = True
            TabOrder = 0
            Text = 'Arial'
          end
          object StyleEd: TEdit
            Left = 16
            Top = 76
            Width = 185
            Height = 22
            TabStop = False
            Color = clBtnFace
            ReadOnly = True
            TabOrder = 1
          end
          object SizeEd: TEdit
            Left = 16
            Top = 120
            Width = 185
            Height = 22
            TabStop = False
            Color = clBtnFace
            ReadOnly = True
            TabOrder = 2
            Text = '10'
          end
          object FontBtn: TBitBtn
            Left = 50
            Top = 152
            Width = 113
            Height = 33
            Hint = 'Select Font'
            Caption = 'Change Font'
            TabOrder = 3
            OnClick = FontBtnClick
            Glyph.Data = {
              76010000424D7601000000000000760000002800000020000000100000000100
              04000000000000010000130B0000130B00000000000000000000000000000000
              800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
              FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
              3333333333333333333333333333333333333333FFF33FFFFF33333300033000
              00333337773377777333333330333300033333337FF33777F333333330733300
              0333333377FFF777F33333333700000073333333777777773333333333033000
              3333333337FF777F333333333307300033333333377F777F3333333333703007
              33333333377F7773333333333330000333333333337777F33333333333300003
              33333333337777F3333333333337007333333333337777333333333333330033
              3333333333377333333333333333033333333333333733333333333333333333
              3333333333333333333333333333333333333333333333333333}
            Margin = 5
            NumGlyphs = 2
          end
        end
      end
    end
  end
  object TabSet: TTabSet
    Left = 0
    Top = 324
    Width = 368
    Height = 21
    Align = alBottom
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    Tabs.Strings = (
      'Page'
      'Scope'
      'Body')
    TabIndex = 0
    OnClick = TabSetClick
    OnChange = TabSetChange
  end
  object ReportSystem1: TReportSystem
    TitleSetup = 'Report Setup'
    TitleStatus = 'Report Status'
    TitlePreview = 'Report Preview'
    SystemSetups = [ssAllowCopies, ssAllowCollate, ssAllowDuplex, ssAllowDestPreview, ssAllowDestPrinter, ssAllowDestFile, ssAllowPrinterSetup]
    SystemFiler.FileName = 'label.tmp'
    SystemFiler.StatusFormat = 'Generating page %p'
    SystemFiler.StreamMode = smFile
    SystemPreview.ZoomFactor = 100.000000000000000000
    SystemPrinter.ScaleX = 100.000000000000000000
    SystemPrinter.ScaleY = 100.000000000000000000
    SystemPrinter.StatusFormat = 'Printing page %p'
    SystemPrinter.Title = 'Report'
    SystemPrinter.UnitsFactor = 1.000000000000000000
    OnPrint = ReportSystem1Print
    OnBeforePrint = ReportSystem1BeforePrint
    OnNewPage = ReportSystem1NewPage
    OnNewColumn = ReportSystem1NewColumn
    Left = 336
    Top = 280
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'System'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Left = 304
    Top = 216
  end
  object OpenDialog1: TOpenDialog
    FileEditStyle = fsEdit
    Title = 'Select Logo File'
    Left = 336
    Top = 216
  end
end